home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / orinf / feb96 / rajaf107.gif < prev    next >
Graphics Interchange Format  |  1996-05-22  |  16KB  |  640x480  |  4-bit (15 colors)
Labels: text | electronics | screenshot | display | software | computer icon | web page | website | operating system | multimedia software
OCR: Microsoft Excel - EMPX.XLS File Edit View Insert Run Tools Window Help ABC do Er E fx E + B I U $ % .09 .... + Sub EmpData() ' Declare variables as objects Dim OraSession As Object Dim OraDatabase As Object Dim EmpDynaset As Object Dim flds () As Object Dim fldcount As Integer Set OraSession = CreateObject ( "OracleInProcServer . XOraSession") Set OraDatabase = OraSession. OpenDatabase ("Oracle7", "scott/tiger", 0g) Set EmpDynaset = OraDatabase. CreateDynaset ( "select * from emp", 0%) Range ( "A1 : H15") . Select Selection. ClearContents K DI Sheet Subroutines Sheet3 Sheet4 Sheet5 She + Ready